<?xml version="1.0" encoding="UTF-8"?><?Siebel-Property-Set EscapeNames="true"?><Business_spcService
 Comments="DO NOT MIGRATE"
 State_spcManagement_spcType="Stateful"
 Cache="N"
 Server_spcEnabled="N"
 Display_spcName="VB Runtime"
 Inactive="N"
 Hidden="N"
 Class="CSSService"
 Name="FWK Runtime"
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="var _uslogs = [];_newline"
 Program_spcLanguage="JS"
 Name="(declarations)"
 Sequence="1"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function EvalExpr(Inputs, Outputs) {_newline	var sExpr = Inputs.GetProperty(&quot;Expr&quot;);_newline	var sBC = Inputs.GetProperty(&quot;BC&quot;);_newline	var bc;_newline	try {_newline		bc = TheApplication().ActiveBusObject().GetBusComp(sBC);_newline		Outputs.SetProperty(&quot;Result&quot;, bc.InvokeMethod(&quot;EvalExpr&quot;, sExpr));_newline	} catch (e) {_newline		Outputs.SetProperty(&quot;Result&quot;, e.toString());_newline	} finally {_newline		bc = null;_newline	}_newline}_newline_newline"
 Program_spcLanguage="JS"
 Name="EvalExpr"
 Sequence="7"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function EvalScript(Inputs, Outputs) {_newline	var sExpr = Inputs.GetProperty(&quot;Expr&quot;);_newline	try {_newline		// reset logs_newline		_uslogs = [];_newline		_newline		// evaluate_newline		var v = eval(sExpr);_newline_newline		// return an evaluation result if log function was not used_newline		if (v &amp;&amp; _uslogs.length === 0) {_newline			log(v);_newline		}_newline	} catch (e) {_newline		log(e.toString(), &quot;\nSource code:\n&quot; + sExpr);_newline	} finally {_newline		Outputs.SetProperty(&quot;Result&quot;, _uslog_usprint());_newline	}_newline}_newline"
 Program_spcLanguage="JS"
 Name="EvalScript"
 Sequence="8"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function InspectWS (Inputs, Outputs)_newline{_newline    var name = Inputs.GetProperty(&quot;Name&quot;);_newline    var bInspect = (Inputs.GetProperty(&quot;Inspect&quot;) == &quot;Y&quot;);_newline    var iLimit = ToNumber(Inputs.GetProperty(&quot;Limit&quot;));_newline    var res = &quot;&quot;, sWS = &quot;&quot;;_newline    _newline    var bo = TheApplication().GetBusObject(&quot;Workspace&quot;);_newline    var bc = bo.GetBusComp(&quot;Repository Workspace&quot;);_newline    var ss = &quot;&quot;;_newline    if (name == &quot;&quot;) {_newline        ss = &apos;[Created By] = LoginId () AND [Status] &lt;&gt; &quot;Delivered&quot; AND [Repository Id] = RepositoryId()&apos;;_newline    } else if (name.match(/\[.*\]/g)) {_newline        ss = name;_newline    } else {_newline        ss = &apos;[Name] like &quot;&apos; + name + &apos;&quot; AND [Repository Id] = RepositoryId()&apos;;_newline    }_newline    _newline    try {_newline        bc.SetSearchExpr(ss);_newline        bc.SetViewMode(AllView);_newline        bc.SetSortSpec(&quot;Updated(DESC)&quot;);_newline        bc.ExecuteQuery(ForwardBackward);_newline        var h = bc.FirstRecord();_newline        if (h) {_newline            if (bInspect) {_newline                bc.InvokeMethod(&quot;OpenWS&quot;);_newline                bc.InvokeMethod(&quot;PreviewWS&quot;);_newline                sWS = bc.GetFieldValue(&quot;Name&quot;);_newline            } else {_newline                var aWS = [];_newline                var i = 1;_newline                while(h &amp;&amp; i &lt;= iLimit) {_newline                     aWS.push(bc.GetFieldValue(&quot;Name&quot;));_newline                     h = bc.NextRecord();_newline                     i++;_newline                }_newline                sWS = aWS.join(&quot;,&quot;);_newline            }_newline        } else {_newline            res = &quot;No workspace found with SearchSpec: &quot; + ss;_newline        }_newline    } catch(e) {_newline        res = &quot;Error happened inspecting a workspace with SearchSpec: &quot; + ss + &quot;\n&quot; + e.toString();_newline    } finally {_newline        bc = null;_newline        bo = null;_newline    }_newline    _newline    Outputs.SetProperty(&quot;Result&quot;, res);_newline    Outputs.SetProperty(&quot;Workspaces&quot;, sWS);_newline}_newline"
 Program_spcLanguage="JS"
 Name="InspectWS"
 Sequence="9"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function InvokeServiceMethod(Inputs, Outputs)_newline{_newline	// Extract service/method name params_newline	var sBS = Inputs.GetProperty(&quot;Service&quot;);_newline	Inputs.RemoveProperty(&quot;Service&quot;);_newline	var sMethod = Inputs.GetProperty(&quot;Method&quot;);_newline	Inputs.RemoveProperty(&quot;Method&quot;);_newline	_newline	var bs;_newline	_newline	try {_newline	    // invoke BS_newline	    bs = TheApplication().GetService(sBS);_newline	    bs.InvokeMethod(sMethod, Inputs, Outputs);_newline	}catch(e){_newline	    throw e;_newline	}finally{_newline	    bs = null;_newline	}_newline}"
 Program_spcLanguage="JS"
 Name="InvokeServiceMethod"
 Sequence="11"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function Service_usPreInvokeMethod (MethodName, Inputs, Outputs)_newline{_newline	if (MethodName == &quot;EvalExpr&quot;){_newline		EvalExpr(Inputs, Outputs);_newline	}_newline	if (MethodName == &quot;EvalScript&quot;){_newline		EvalScript(Inputs, Outputs);_newline	}_newline	if (MethodName == &quot;InvokeServiceMethod&quot;){_newline		InvokeServiceMethod(Inputs, Outputs);_newline	}_newline	if (MethodName == &quot;Log&quot;){_newline		AppLog(Inputs, Outputs);_newline	}_newline	if (MethodName == &quot;InspectWS&quot;){_newline		InspectWS (Inputs, Outputs);_newline	}_newline	if (MethodName == &quot;InspectWSVersion&quot;){_newline		InspectWSVersion(Inputs, Outputs);_newline	}_newline	return (CancelOperation);_newline}"
 Program_spcLanguage="JS"
 Name="Service_usPreInvokeMethod"
 Sequence="13"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function _uslog_usobj(o, s) {_newline	var res = &apos;&apos;;_newline	s = (&apos;undefined&apos; === typeof s? &apos;&apos; : s);_newline	/* traditional representation */_newline	res += s + o;_newline	s += &apos;\t&apos;;_newline	/* and also all available keys */_newline	for (var k in o) {_newline		try{_newline			var v = o[k];_newline			if (typeof v === &quot;object&quot;){_newline				res += String.fromCharCode(10) + _uslog_usobj(v, s);_newline			} else {_newline				res += String.fromCharCode(10) + s + k + &apos; = &apos; + v;_newline			}_newline		}catch(e){_newline			res += String.fromCharCode(10) + s + k + &apos; = &apos; + e.toString();_newline		}_newline	}_newline	return res;_newline}"
 Program_spcLanguage="JS"
 Name="_uslog_usobj"
 Sequence="2"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function _uslog_usone(o){_newline	var val = &apos;&apos;;_newline	if (&apos;object&apos; === typeof o){ _newline		if(&apos;function&apos; == typeof o.toString &amp;&amp; o.toString() === &apos;[object PropertySet]&apos;) {_newline			val = String.fromCharCode(10) + _uslog_usps(o, &apos;\t&apos;);_newline		}else{_newline			val = String.fromCharCode(10) + _uslog_usobj(o, &apos;\t&apos;);_newline		}_newline	} else {_newline		val = o;_newline	}_newline	return val;_newline}"
 Program_spcLanguage="JS"
 Name="_uslog_usone"
 Sequence="3"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function _uslog_usprint() {_newline	return _uslogs.join(String.fromCharCode(13));_newline}"
 Program_spcLanguage="JS"
 Name="_uslog_usprint"
 Sequence="4"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function _uslog_usps(o, s) {_newline	var res = &apos;&apos;;_newline	s = (&apos;undefined&apos; === typeof s ? &apos;&apos; : s);_newline	/* type */_newline	res += s + (o.GetType() ? o.GetType() : &apos;PropertySet&apos;);_newline	/* value */_newline	res += o.GetValue() ? &apos; = &apos; + o.GetValue() : &apos;&apos;;_newline	s += &apos;\t&apos;;_newline	/* properties */_newline	var p = o.GetFirstProperty();_newline	while (p) {_newline		res += String.fromCharCode(10) + s + p + &apos; = &apos; + o.GetProperty(p);_newline		p = o.GetNextProperty();_newline	}_newline	/* children */_newline	for (var i = 0; i &lt; o.GetChildCount(); i++) {_newline		res += String.fromCharCode(10) + _uslog_usps(o.GetChild(i), s);_newline	}_newline	return res;_newline}_newline_newline"
 Program_spcLanguage="JS"
 Name="_uslog_usps"
 Sequence="5"
></Business_spcService_spcScript
><Business_spcService_spcScript
 Comments=""
 Parent_spcId="1-G0FUS4"
 Parent_spcName="FWK Runtime"
 Parent_spcInactive="N"
 Inactive="N"
 Script="function log() {_newline	var res = [];_newline	var d = new Date();_newline	var sd = d.toString();_newline	res.push(sd.substr(sd.length-9, 8) + &apos;:&apos; + d.getMilliseconds());_newline	for (var i = 0; i &lt; arguments.length; i++) {_newline		res.push(_uslog_usone(arguments[i]));_newline	}_newline	_uslogs.push(res.join(&apos;\t|\t&apos;));_newline}"
 Program_spcLanguage="JS"
 Name="log"
 Sequence="12"
></Business_spcService_spcScript
></Business_spcService
>